package com.wondertek.poms.core.config;

import java.util.ArrayList;
import java.util.List;
import java.util.UUID;

import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.data.redis.core.RedisCallback;
import org.springframework.data.redis.core.RedisTemplate;
import org.springframework.stereotype.Component;
import org.springframework.util.StringUtils;

import lombok.extern.slf4j.Slf4j;
import redis.clients.jedis.Jedis;
import redis.clients.jedis.JedisCluster;
import redis.clients.jedis.JedisCommands;

/**
 * redis分布式锁
 *
 * @author douzi
 * @version 1.0
 * @description
 * @update 2019年11月20日 下午4:57:54
 */
@Component
@Slf4j
public class RedisDistributedLock {
    @Autowired
    private RedisTemplate redisTemplate;

    public static final String UNLOCK_LUA;

    //过期时间60秒
    public static final long EXPIRE = 60000L;

    //延迟重试时间500ms
    public static final long SLEEP_TIME = 500L;

    //重试次数
    public static final int RETRY = 5;

    static {
        StringBuilder sb = new StringBuilder();
        sb.append("if redis.call(\"get\",KEYS[1]) == ARGV[1] ");
        sb.append("then ");
        sb.append("    return redis.call(\"del\",KEYS[1]) ");
        sb.append("else ");
        sb.append("    return 0 ");
        sb.append("end ");
        UNLOCK_LUA = sb.toString();
    }


    /**
     * 加锁
     * 返回true 则获锁成功，false 获锁失败
     */
    public boolean lock(String key, String requestId) {
        try {
            RedisCallback<String> callback = (connection) -> {
                JedisCommands commands = (JedisCommands) connection.getNativeConnection();
                //使用uuid和 当前线程的名字作为 存储值
                //NX 当key不存在时，我们进行set操作；若key已经存在，则不做任何操作
                //PX 给这个key加一个过期的设置，具体时间由第五个参数决定
                return commands.set(key, requestId, "NX", "PX", EXPIRE);
            };
            String result = (String) redisTemplate.execute(callback);
            return !StringUtils.isEmpty(result);
        } catch (Exception e) {
            log.error("set redis occured an exception:", e);
        }
        return false;
    }

    /**
     * 生成value
     */
    public String getRequestId() {
        String uuid = UUID.randomUUID().toString() + Thread.currentThread().getName();
        return uuid.replace("-", "");
    }


    /**
     * 获取uuid
     */
    public String getValue(String key) {
        String result = "";
        try {
            RedisCallback<String> callback = (connection) -> {
                JedisCommands commands = (JedisCommands) connection.getNativeConnection();
                return commands.get(key);
            };
            result = (String) redisTemplate.execute(callback);
            return result;
        } catch (Exception e) {
            log.error("get redis occured an exception:", e);
        }
        return result;
    }

    /**
     * 解锁
     *
     * @param key       锁标识
     * @param requestId uuid
     */
    public boolean unLock(String key, String requestId) {
        // 释放锁的时候，有可能因为持锁之后方法执行时间大于锁的有效期，此时有可能已经被另外一个线程持有锁，所以不能直接删除
        try {
            List<String> keys = new ArrayList<>();
            keys.add(key);
            List<String> args = new ArrayList<>();
            args.add(requestId);

            // 使用lua脚本删除redis中匹配value的key，可以避免由于方法执行时间过长而redis锁自动过期失效的时候误删其他线程的锁
            // spring自带的执行脚本方法中，集群模式直接抛出不支持执行脚本的异常，所以只能拿到原redis的connection来执行脚本
            RedisCallback<Long> callback = (connection) -> {
                Object nativeConnection = connection.getNativeConnection();
                // 集群模式和单机模式虽然执行脚本的方法一样，但是没有共同的接口，所以只能分开执行
                // 集群模式
                if (nativeConnection instanceof JedisCluster) {
                    return (Long) ((JedisCluster) nativeConnection).eval(UNLOCK_LUA, keys, args);
                } else if (nativeConnection instanceof Jedis) {
                    // 单机模式
                    return (Long) ((Jedis) nativeConnection).eval(UNLOCK_LUA, keys, args);
                }
                return 0L;
            };
            Long result = (Long) redisTemplate.execute(callback);
            log.info("redis 释放锁==>{}:{} result:{}", key, requestId, result);
            return result != null && result > 0;
        } catch (Exception e) {
            log.error("release lock occured an exception", e);
        }
        return false;
    }

    /**
     * 重试机制
     *
     * @param key 锁标识
     * @return
     */
    public Boolean lockRetry(String key, String uuid) {
        Boolean flag = false;
        try {
            for (int i = 0; i < RETRY; i++) {
                log.info("第" + i + "尝试添加|key=" + key + "|uuid=" + uuid);
                flag = lock(key, uuid);
                if (flag) {
                    log.info("尝试添加分布式锁成功|key=" + key + "|uuid=" + uuid);
                    break;
                } else {
                    Thread.sleep(SLEEP_TIME);
                }

            }
        } catch (Exception e) {
            log.error("重试过程中添加锁出现异常", e);
        }
        return flag;
    }

}

